Top 10k strings from 16-48 Magazine - Issue 03 (1984)(16-48 Tape Magazine)(Side A).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   9 ;"                                ":
   6 Magnetic Magazines Ltd.*6\$:
   5 PPPPPPPPPP
   5 16/48 script
   4 B.C.THORNE APRIL 1983*S\
   4 ;"PRESS ANY KEY"
   4 0000000000000000000000000000
   4 ((prog+474
   3 z$="10020203RUN THE TAPE":
   3        pp00000p000
   2 z$="09020203STOP THE TAPE":
   2 yyyyyyyyyy
   2 m,o;"                                ":
   2 ^00000000FFFFFFFFF00
   2 @@@@@@@@@@@@@
   2 @@@@@@@@@@
   2 ;"PRESS ANY KEY":
   2 ;"Keep the tape running":
   2 ;"               ";
   2 8888888888888888888888888888
   2 2222220000000000000000000000000022
   2 22000000000000000000000000000
   2 0800                    !!!!
   2 022222000000000FFFFFFFFF00
   2 022222000000000F;;999;;F00
   2 02222000000000000000000000
   2 002220000000000F;;999;;F00
   2 000000000000000F;;9998;F00
   2 000000000000000F8;99888F00
   2 "16/48TITLE"
   2 "16/48LOAD1"
   2 "16/48EDIT"
   2  8                         !
   2  8                               8                               8  888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
   2              
   1 z$="16000305Like this.":
   1 z$="15030204Stop the tape":
   1 z$="15000402PRESENTS":
   1 z$="13020203LONG WAY HOME":
   1 z$="1202050316/48":
   1 z$="11110202THE":
   1 z$="10050305"+
   1 z$="10030203STOP THE TAPE":
   1 z$="10020203STOP THE TAPE":
   1 z$="10020102Please let the tape run.":
   1 z$="05050305SCORE":
   1 z$="04000404Way home":
   1 z$="03030202INSTRUCTIONS":
   1 z$="01040303The long":
   1 z$="00010503SPIDER":
   1 z$="00010203PIXEL SCROLLING"
   1 z$="000008051984":
   1 z$="0000060516 48":
   1 up to more than 3.
   1 type   GOTO GO
   1 t$="0000000000"
   1 t$(n)="1":
   1 scroll right
   1 scroll left
   1 s=prog+211
   1 r$=r$+"            ":
   1 p00000p022
   1 p00000p000
   1 oldl,oldc;"
   1 o,o;"Press any key to return to menu.":
   1 letter    
   1 k$="You have killed":
   1 j$=" junction between corridors.":
   1 i$="You are injured.":
   1 elements  \ 
   1 cl=cl+(l>cl)*(
   1 cl)+("West "
   1 cl)+("Up "
   1 cl)+("South "
   1 cl)+("East "
   1 cl)+("Down"
   1 cc=cc+(c>cc)*(
   1 cc=(c+xx):
   1 advintro#1o
   1 a$=a$+".      "
   1 a$=a$+".                P O K E  2 3 6 5 8 , 8                     switches ~C A P S  L O C K~ on"
   1 a$=a$+" I especially like the  m.c. routines & the hardware tests"
   1 a$=a$+"     Poking ~0~  in will switch it off again.                       " 
   1 a$=a$+"         R A N D O M I Z E  U S R  3 2 8 0             scrolls the screen up 1 line." 
   1 a$=a$+"               "
   1 a$=a$+"                OK. I know it's not the first Spectrum mag on tape, but if No1 is anything to go by it's the best !!"
   1 a$=a$+"                         "
   1 a$="west":
   1 a$="south":
   1 a$="north":
   1 a$="east":
   1 a$="down":
   1 a$="SPACESUIT":
   1 a$="PICTURE":
   1 a$="PICTURE"
   1 a$=" Here are some P O K E S that some of your readers may like to see.                   "
   1 a$=" Dear Ed.                                     Just thought I would scroll you a line     about your ~ace~ new mag."
   1 a$="  Well that's about it, keep up the good      work, I can't wait for No 2.                           Yours sincerely                              Pete Telfer                 P.S. Hope this fits in 16K !!"
   1 a$="    Press ~R~ to read again          or   ~C~ to continue":
   1 a$="      P O K E  2 3 6 9 2 , 2 5 5           gives you an ~A U T O S C R O L L~ which  stops the ~scroll?~ report code when some thing is printed below line 2 1"
   1 a$="      P O K E  2 3 6 0 9 , n               changes the duration of the keybord                                ~C L I C K~" 
   1 a complete copy of the game,   details of where you are & what has happened to you."
   1 ^PPPPzzxxxxxxxxxxxxxxxxxzzzzzPPPPPPPPPzxxxxxxxxxxxxxzzzzzzzPPPPPPPPPPPzzzzxxxxxxxxxxzzzzzPPPPPPPPPPPPPPPPzzxxxxxxxzz8zzPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP_____8PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPWWWPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPT``````````TPPPPPPPPPPPPPPPPPPPT`````````````TPPPPPPPPPPPPPTTTT``````````````TTPPPPPPPPPPPPP``````````````````TPPPPPPPP888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
   1 ^88888888888888888888888888888888
   1 ^'???????88888888888888888888''   '''''88?88888888888888888'''        ''''8888888888888888''     pp04444  
   1 The flashing No's must not add
   1 T$="0000000000"
   1 Suddenly you fall through the   floor. 
   1 STOP THE TAPE
   1 SPIDER    
   1 SCROLL    3
   1 Rewind & play tape (
   1 RANDOMIZE USR (MEM+228)
   1 RANDOMISE USR (MEM+114)
   1 RANDOMISE USER MEM
   1 Program BARRY THORNE
   1 Press any key to continue.      
   1 POKE 23512,0 for left
   1 POKE 23511, 1,2,3 blocks.
   1 POKE 23510, top block 0,1,2.
   1 POKE 23506,No of pixels up
   1 POKE 23505,No of pixels down
   1 PLAY TAPE TO VERIFY
   1 PIXEL     
   1 P$="You take the ":
   1 OWGGGGGGgg
   1 NB. if it doesn't
   1 London W4 4PH.
   1 Jimpix    
   1 J$'"You see blood on the floor.":
   1 J$'"You see an alarm Button":
   1 J$'"You see a hole in the ceiling.":
   1 In order to break out of the    game to load side 2 of 16/48,   Press CAPSHIFT 6 ,Type LOAD""""   "'"ENTER, and play side 2.
   1 HEL=HEL*.5
   1 H HYDROGEN    -259 -253g1HeHELIUM      -270 -269g1LiLITHIUM     180  1330m1BeBERYLIUM    1280 2450m1B BORON       2030 2550s1C CARBON      3500 3900s1N NITROGEN    -210 -196g1O OXYGEN      -219 -183g1F FLUORINE    -220 -188g1NeNEON        -249 -246g1NaSODIUM      97.8 883 m1MgMAGNESIUM   650  1100m1AlALUMINIUM   660  2400m1SiSILICON     1410 2480c1P PHOSPHORUS  44.2 280 s1S SULPHUR     119  445 s1ClCHLORINE    -101 -34 g1A ARGON       -189 -186g1K POTASSIUM   63.2 760 m1CaCALCIUM     850  1440m1ScSCANDIUM    1400 2500m2TiTITANIUM    1680 3300m2V VANADIUM    1920 3400m2CrCHROMIUM    1900 2600m1MnMANGANESE   1250 2100m1FeIRON        1539 2900m1CoCOBALT      1492 2900m1NiNICKEL      1453 2820m1CuCOPPER      1083 2580m1ZnZINC        420  907 m1GaGALLIUM     29.8 2250m2GeGERMANIUM   958  2880c2AsARSENIC     0000 610 s1SeSELENIUM    217  685 s2BrBROMINE     -7.3 58.2l1KrKRYPTON     -157 -153g1RbRUBIDIUM    38.8 710 m2SrSTRONTIUM   770  1460m1Y YTTRIUM     1500 3000m2ZrZIRCONIUM   1850 4400m2NbNIOBIUM     2420 510
   1 Graphics JIM DANN
   1 GOSUB 9800 or 9810 to           change script.
   1 GGGGGGGGGGGGGGGGGGGGGGG
   1 GGGGGGGGGGGGGGGEEGGGG
   1 GGGGGGGGGGG
   1 GGGEGCGGGGGGGGGGGGGGBGG
   1 GGFGGGGGGGDGGGGGGGGGGGG
   1 For upwards scrolling       
   1 For sideways scrolling    
   1 For downwards scrolling   
   1 ELEMENTAL MENU
   1 Don,t Panic
   1 Code stored at MEM,
   1 C$="You go along a corridor to a":
   1 BBBPPPPPPP
   1 A$="ROBOT":
   1 A Robot appears 
   1 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@****************
   1 @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
   1 @@@@@@@@@@@@@@@@@@@@@@@@@@@
   1 @@@@@@@@@@@@@@@@@@@@@@@
   1 @@@@@@@@@@@@@@@@@@@@@@
   1 @@@@@@@@@@@@@@@@@@
   1 @@@@@@@@@@@@@@@@@
   1 @@@@@@@@@@@@@@
   1 @@@@@@@@@@@@
   1 @@@@@@@@@@@
   1 =instructions or key changes."
   1 ;'"Play the tape containing your   previous game":
   1 ;"the screen to moved";
   1 ;"scroll UP.":
   1 ;"scroll DOWN."''" POKE 23606,number of pixels to";
   1 ;"be scrolled";
   1 ;"What would George Orwell have   thought about a magazine which  can only be read by a machine?"
   1 ;"We have 3 routines stored"'" in the memory."''" Scroll up at MEM (=32290)"''" Scroll down at (MEM+114)"''" Scroll sideways at (MEM+228)"
   1 ;"To scroll the top 1/3rd of the  screen 25 pixels to the left    and then 25 to the right we do  this;-"''" POKE 23510,
   1 ;"This month sees the first"'" chapter of our adventure game":
   1 ;"This is our first program to    give all you 48K folk more than your 16K brethren."'"    INSTANT GRAPHICS.":
   1 ;"This is a killer wasp...";
   1 ;"This is a dead fly......";
   1 ;"This adventure continues in the next edition."
   1 ;"The scrolling routines are in   a block of 307 bytes of machine code stored in RAM starting at  ";MEM;". We will call the start   address of the code MEM from    now on."
   1 ;"The routines all look for this  information in memory locations 23505 to 23512(in the print"'" buffer)."'" (These addresses still apply"'" even if you move the code.)"''" You will need to POKE these"'" these addresses as shown on the next page.":
   1 ;"The long way home"
   1 ;"TAPE 03  FEBRUARY 84  SIDE 1"
   1 ;"Start the tape":
   1 ;"START THE TAPE"'
   1 ;"SIDE 1 LOADING"
   1 ;"SCORE=";s;"   "
   1 ;"SCORE=";s;"    "
   1 ;"SCORE=";s
   1 ;"SCORE= ";s;"/10":
   1 ;"Press any key";
   1 ;"Press any key":
   1 ;"PRESS A KEY"
   1 ;"PLEASE WAIT":
   1 ;"Let the tape run to the end of  side one (16K machines will not LOAD the machine code after the adventure game."'"If you save the game it will"'"only run after CLEAR 32766":
   1 ;"LOW SCORE=";ls
   1 ;"If you have 16K machine then    you can still enjoy the game    but do try to see it on a 48K   machine if you get a chance."''" We could use some feedback on   this memory business. Write and complain if you are going to be too frustrated if we publish    the odd couple of 48K only      programs."''" Squeezing ""ELEMENTS"" into 16K"'" was hard work and limiting." :
   1 ;"Here is an example showing how  to scroll 40 pixels up and then down again."'" Line 3200 of this program looks like this"''"3200 POKE 23505,40:POKE 23506,40: RANDOMISE USR (MEM+114): RANDOMIZE USR MEM"''"When you press a key this line  will be executed."
   1 ;"HIGH SCORE=";hs;:
   1 ;"Firstly, I would like to thank  all those of you who responded  to issue 1 with letters"'" programs or competition"'" entries. As you will see, the   standard has been very high."''" We only had room for one"'" reader's program in this issue  but there are some great things on the way.":
   1 ;"EXTRA COMMANDS FOR 48K'ers"
   1 ;"ENTER your name please.";
   1 ;"Don't worry about the silence   between loading the program &   machine code"
   1 ;"Before scrolling up or down;-"'''" POKE 23505,number of pixels to";
   1 ;"All these POKEs and calls are   summarised in lines 3 to 6 of   this program."'''" To save this whole program and  the code simply BREAK and"'" GOTO 9999. Have a look at line  9999 first to see what it does."''" To save the code only use"'" SAVE ""SCROLL""
   1 ;"All the old offers still hold.  Send letters, problems, or      ideas to "'" 
   1 ;"2 for the bottom"''" POKE 23511,number of thirds to";
   1 ;"1,2 or 3."
   1 ;"1 to scroll right"''" The routine will return to the  basic after scrolling one"'" pixel.":
   1 ;"1 for the middle";
   1 ;"0 for the top";
   1 ;" to load SPIDER.";
   1 ;" You can also scroll each third  of the screen independantly     left or right.":
   1 ;" START TAPE ";
   1 ;" Before we can use the up or"'" down routines we need to"'" specify how many pixels we wish the screen to move."''" Before moving sideways we need  to specify which parts of the   screen and which direction.":
   1 ;" Before scrolling sideways;-"''" POKE 23510,the highest third of";
   1 ;" A machine code routine which"'" will let you scroll the whole   screen up an down like this."
   1 ;" 16/48   FEBRUARY 84   TAPE 03 "
   1 ;"  THE 15......A READER'S PROGRAM"'"OTH MACHINE CODE SCROLLING...SMO"
   1 ;"  SPIDER......CAN YOU TRAP ME?  "'"RACE FOR HOME    VORTEX.......A "
   1 ;"  REVIEWS.....3D TANK GAMES     SSUE 1 WINNERS   COMPETITION & I"
   1 ;"  ELEMENTS....DATA BASE AND TEST"'"EFUL PROGRAM AID RENUMBER.....US"
   1 ;"  ADVENTURE...THE LONG WAY HOME "'"ND GREEN MEN     MORE DUNGEONS A"
   1 ;"   Prsss ~C~  for a print out"
   1 ;"         RUN THE TAPE           ":
   1 ;"            ";:
   1 ;"             ";
   1 ;"             ":
   1 ;"             "
   1 ;"              ";:
   1 ;"              ";
   1 ;"              "
   1 ;"                     "
   1 :88888888x88888x888888
   1 :(just 1 block)     
   1 :(for top block)"'" POKE 23511,
   1 9988888888888888
   1 998888888888
   1 8???????????????????????????????8888888888888888888888888888888?8888888888888888888888888888888?8888888888888888888888888888888?8888888888888888888888888888888?8888888888888888888888888888888?8888888888888888888888888888888?8888888888888888888888888888888888888888888888888888888888888888
   1 88899888888888x88888888
   1 888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
   1 8888888888888888888888888
   1 8888888888
   1 888'''''''''' '''''''''''888!!!!''''''''''''' ''''''''''''''888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
   1 888!!!''''''' '''''''''
   1 32290,307"
   1 307 bytes long.
   1 25: RANDOMIZE 
   1 16/48TITLE
   1 16/48LOAD1
   1 16/48EDIT /
   1 16/48 magazine,
   1 10020203STOP THE TAPE                                                a
   1 10 Barley Mow Passage,
   1 1 for right.
   1 0 Created by Muf for www.speccy.cz
   1 ,o;"You score 1 point for each step you take up to the time you hit something fatal (a wasp,your    trail,my trail or the wall).     "'"You will start with the first   key press and you cannot stop."
   1 ,o;"You are a spider........
   1 ,o;"If you BREAK from this program  restart with GOTO 1000. NOT RUN.";
   1 ,o;"I am also a spider......
   1 )="ll000101"+
   1 )="10020203STOP THE TAPE":
   1 )="10020203RUN THE TAPE":
   1 )="10020203"+a$(n,a
   1 )="02020203"+a$(n,c
   1 )="02000102Atomic No  Symbol  Name          Mass No  m.p.  b.p.  Density":
   1 )-(l<cl)*(
   1 )-(c<cc)*(
   1 )*(k$=r$)-(
   1 )*(k$=d$)-(
   1 (cl,cc)<55
   1 (MEM+228): NEXT n:"'" POKE 23512,1:(to go right)"'" FOR n=1
   1 (MEM+228): NEXT n":
   1 'C$'"small ANTE-ROOM."'"You see many small boxes.":
   1 'C$'"RECEPTION ROOM":
   1 ''"Do you want a print out of theseinstructions ? (y/n)"
   1 ''" For those of you new to using   machine code routines we will   try to make it easy for you.":
   1 '"Your score is ";
   1 '"You find yourself in a"
   1 '"You are in a TRANS-MAT unit.You see a faulty control panel with a button on it.":
   1 '"Do you want to read these again?"'"(y/n)"
   1 '"Do you want to load a previous  game ?"
   1 '" You can load the code to any    address you like so long as     you remember to CLEAR to a      lower address and let MEM =     the new address.":
   1 '" POKE 23512,0 to scroll left";
   1 #p;("DUMP - This will SAVE &
   1 #p;'"It is the year 4816, you are    on your way home. You step into a Trans-mat unit, press the     control & dematerialize."
   1 #p;"WHAT CAN I SEE - This reminds   you of where visible exits are"'("and shows you a picture."
   1 #p;"Avoid giving more than one"'"instrucion per sentence."''"Two corridoors are curved this  may confuse map makers !"
   1 #p''"16/48 Presents the first episodeof a new text & graphics"'"adventure game.(High speed,     hi-res graphics for 48K'ers      only.)"
   1 #p'"You tell the computer what you  want to do by typing in ENGLISH.(Then pressing enter)"
   1 #p'"Use short sentences if possible."
   1 #p'"The idea of the game is to find your way through the spaceship  and find the way out into the   next episode."
   1 #p'"Something is wrong !"'"You rematerialize in the wrong  place. You are in some sort of  spaceship..."
   1 #p'"N =GO NORTH"'"S =GO SOUTH ...etc"'"INSTRUCTIONS - gives you these  instructions again."
   1 #p'"HELP - The computer may give youadvice."'("DUMP - This will SAVE and 
   1 #p'"GO NORTH (SOUTH etc.)"'"WHAT HAVE I GOT WITH ME ?"'"EXAMINE THE ..."'"TAKE THE ..."'"ATTACK THE.."
   1 #p'"Draw a map wherever you go so   that you can find your way back."
   1 #p'"Don't worry if your character iskilled early on in your first   game, it is all part of the     learning process !"
   1 #p'"Certain single words can be usedas commands. These are:"
   1 "rewind & play":
   1 "nothing.":
   1 "elements"
   1 "comfortable LOUNGE"'"You see some chairs & pictures  on the walls.":
   1 "advintro#1"
   1 "advent1/48"
   1 "a","90","102","165","219","165","66","66","102","b","28","235","150","9","9","150","235","156","c","102","66","66","165","219","165","102","86","d","56","215","105","144","144","105","215","56","e","129","66","36","24","24","36","66","129","f","24","60","24","60","90","217","153","102","k","207","179","124","150","171","124","179","207","l","254","253","107","7","7","107","253","254"
   1 "a store room."'"You see some large boxes of gold& diamonds":
   1 "Your powerpack is exhausted.":
   1 "You wait.":
   1 "You take the";a$;" & put it   on.":
   1 "You see the following;":
   1 "You see nothing of interest.":
   1 "You kill the man & damage his   spacesuit.":
   1 "You kill the Robot with your gun":
   1 "You hear a distant explosion."'"The air rushes out.":
   1 "You have with you"
   1 "You have nothing to eat.":
   1 "You have no spacesuit.":
   1 "You have no Powerpack for your  gun."
   1 "You have been killed":
   1 "You eat some food, you feel muchbetter!":
   1 "You dematerialize":
   1 "You cannot.":
   1 "You cannot go ";a$:
   1 "You cannot eat in a spacesuit !":
   1 "You can only change direction.   "'"You do this with keys 5 to 8 or you can choose your own keys by pressing 
   1 "You attack the Robot with your  fists."
   1 "You are weak & hungry"
   1 "You are unable to do so.":
   1 "You are lucky ";k$'"the robot":
   1 "You are in a hall with many"'"Robots.They line up menacingly":
   1 "Write this code down on a piece of paper.It is your entry code  to the next episode."'t$;hel
   1 "Which direction ?":
   1 "What are you going to do ?"'"
   1 "There is nothing to talk to.":
   1 "There are exits visible;"'("North "
   1 "The wall slides open":
   1 "The wall closes behind you."
   1 "The screen is a web and you musteat the flies(20 points each)   and try to trap me(100 points).  "'"Each time you trap me a relativeappears from nowhere to continuethe fight."
   1 "The robot attacks you.":
   1 "The picture on the west wall    has a concealed button.":
   1 "The most common words that I    understand are;":
   1 "The man says'The TRANS-MAT unitsare being affected by a high    energy star.This room contains  many units,they must be removed before the unit you arrived in  will work.I have wired a controlfor this you must..'"'"The man dies.":
   1 "The man is wounded."'"He can still talk.":
   1 "The blood leads south":
   1 "TAKE","GOT","EAT","HELP","SEE","LOOK","EXAMINE","SAY","NORTH","SOUTH","EAST","WEST","UP","DOWN","THROUGH","LEAVE","ATTACK","KILL","PRESS","PUSH","PULL","WAIT"
   1 "SHOOT","QUIT","DUMP"
   1 "Only one lever seems to be"'"connected":
   1 "Nothing happens.":
   1 "Long Way"
   1 "Large storeroom."'"You see some large metal crates,a man"+(" in a spacesuit."
   1 "It is too heavy!":
   1 "In the boxes you find;"'"Food, a torch, a laser gun,"'"a powerpack and a compass.":
   1 "INSTRUCTION"
   1 "I did not understand that !":
   1 "Highest score today!";
   1 "Find out what the lever does.":
   1 "ENTER answer";r$:
   1 "ENTER UP KEY";
   1 "ENTER RIGHT KEY";
   1 "ENTER LEFT KEY";
   1 "ENTER DOWN KEY";
   1 "Do you want to save this game   on a blank tape ? (y/n)"
   1 "CONTROL ROOM. You see a crudely rewired control console.":
   1 "Be thankful that you are wearinga spacesuit !":
   1 "ALL","EVERYTHING","GOLD","DIAMOND","SPACESUIT","FOOD","GUN","POWERPACK","TORCH","COMPASS","PICTURE"
   1 "ADVENTURE"
   1 ";';" We will pay `5 for anything we  publish and `50 if you can      send us an original program     which we can feature.";';" Meanwhile enjoy the rest of the tape....":
   1 "46+25*(g$=""2"")+7*(g$=""3"")+22*(g$=""4"")":
   1 "''"This program contains data on   100 elements. How many do you   want?"'''" 
   1 "''" No  Symbol","Name"
   1 "'"WAIT - you do nothing."'"QUIT - This restarts the game."
   1 "'" POKE 23512,0:(to go left)"'" FOR n=1 TO 25: RANDOMIZE 
   1 !!! '''' ''''''
   1 !     pp00000
   1  to read again.";
   1  to read again";
   1  to quit and move on."
   1  to quit and move on":
   1  to move on."
   1  to move on.  
   1  to go again.   
   1  to find out more.";
   1  starts at prog+730
   1  only 46 well known elements"''" 
   1  now."''"Press any other key to start."
   1  details of your game so that youcan RUN the game again from thatpoint."
   1  at prog+34             
   1  at prog+326,361,402,     453,484,517,550,593,632,673     
   1  at prog+237       poke 64,72,80 in prog+239       poke 64*1,2,3 in prog+241       
   1  at prog+211       poke 64,72,80 in prog+213       poke 64*1,2,3 in prog+215        
   1  all one hundred elements"'''"  Press 
   1  all but 29 obscure elements"''" 
   1  add in man made elements"''" 
   1  USEFUL PHRASES 
   1  INSTRUCTIONS 
   1  GET OUT OF HERE ! 
   1  COMMANDS "
   1  B.C.THORNE SEPT 1983
   1  1983 16/48 Magazine Ltd*S\
   1   to quit";#1
   1   Test on symbols"'''" 
   1   Test on names"'''" 
   1   List names and symbols only"'''" 
   1   List elements and data"'"    (m.p.=melting pt in Celcius      b.p.=boiling pt"'"     density is in g/ml)"'''" 
   1     at prog+154          poke lines in prog+141       poke new attr in prog+142         
   1       """"""""""" !!!
   1        pp00000p111
   1          ''8>00>8''      
   1           0000000000   !!!!"
   1            "
   1             0000000000                                         888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
   1                  (MEM=32290 if you have           not moved it.)
   1                         %!!!!!!!%%%          888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888
   1                         "
   1                                  
   1                        
   1                       
   1                  
   1                 
   1                
   1             
   1            
   1